(x_set_frame_parameters): Call check_frame_size

before Fset_frame_size and Fset_frame_position.

diff --git a/src/xfns.c b/src/xfns.c
index d5dbc810253c94cf9d887c9dfc5902059ae948a7..249f89ba75624e4cdd68120a5495a5c641bb798c 100644 (file)
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -419,6 +419,8 @@ x_set_frame_parameters (f, alist)
   {
     Lisp_Object frame;
 
+    check_frame_size (f, &height, &width);
+
     XSET (frame, Lisp_Frame, f);
 
     if ((NUMBERP (width) && XINT (width) != FRAME_WIDTH (f))